home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 2004 E…tra 100 Bedste Programmer / K-CD_2004_Ekstra_100_Gratis_Programmer.iso / Windows / X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ WinNT CMD AutoRun.xpl < prev    next >
Encoding:
XSetup plugin  |  2003-11-20  |  1.3 KB  |  47 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="1"
  3. "COUNT"="1"
  4. "UIPATH 1"="Appearance\System\Command Prompt"
  5. "UIPATH 2"="Program Options\Built in Windows Apps\Command Prompt"
  6. "NAME"="CMD AutoRun"
  7. "OSVERSION"="0101011"
  8. "VERSION"="1.06"
  9. "LANGUAGE"="VBScript"
  10. "TEXT 1"="Command"
  11. "DESCRIPTION 1"="Enter a command you'd like to run automatically when launching CMD.EXE (Command Prompt)."
  12. "DESCRIPTION 2"="To execute more than one command, seperate the command using && (e.g. dir c:\&&dir e:\)
  13. "AUTHOR"="CptSiskoX"
  14. "CONTACTURL"="http://www.xteq.com"
  15. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  16. "COMMENT 1"="Thanks to Pierre Szwarc for discovering this option! "
  17.  
  18.  
  19. sP1="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Command Processor\"
  20. sV1="Autorun"
  21.  
  22. 'Called when the Plugin is started
  23. Sub Plugin_Initialize
  24. ' if RegPathExists(sP1) then
  25.     s=RegReadValue(sP1 & sV1)
  26.     SetUIElement 1,s
  27. ' else
  28. '    Disable
  29. ' end if
  30. End Sub
  31.  
  32. 'Called when the Plugin should validate the Data the user has entered
  33. Sub Plugin_CheckData(ElementIndex)
  34. End Sub
  35.  
  36. 'Called when the Plugin should apply the changes
  37. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  38.  s=GetUIElement(1)
  39.  Call RegWriteValue(sP1 & sV1,s,1)
  40.  
  41.  Call Restart()
  42. End Sub
  43.  
  44. 'Called when the Plugin is about to be removed from memory
  45. Sub Plugin_Terminate
  46. End Sub
  47.